Шаг 45 - Объект Folder.

Объект Folder обеспечивает доступ к свойствам папки

Замечания
Следующий код иллюстрирует, как получить объект Folder и как получить одно из свойств:

Sub ShowFolderInfo(folderspec)
    Dim fs, f, s,
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    s = f.DateCreated
    MsgBox s
End Sub

Свойства
Attributes
DateCreated
DateLastAccessed
DateLastModified
Drive
Files
IsRootFolder
Name
ParentFolder
Path
ShortName
ShortPath
Size
SubFolders
Type

Методы
Copy
CreateTextFile
Delete
Move

Hosted by uCoz